3.92 \(\int \frac{(a+b \tanh ^{-1}(c x^2))^2}{(d x)^{3/2}} \, dx\)

Optimal. Leaf size=6334 \[ \text{result too large to display} \]

[Out]

(-2*Sqrt[2]*a*b*c^(1/4)*Sqrt[x]*ArcTan[1 - Sqrt[2]*c^(1/4)*Sqrt[x]])/(d*Sqrt[d*x]) + (2*Sqrt[2]*a*b*c^(1/4)*Sq
rt[x]*ArcTan[1 + Sqrt[2]*c^(1/4)*Sqrt[x]])/(d*Sqrt[d*x]) + ((2*I)*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqr
t[x]]^2)/(d*Sqrt[d*x]) + ((2*I)*b^2*c^(1/4)*Sqrt[x]*ArcTan[c^(1/4)*Sqrt[x]]^2)/(d*Sqrt[d*x]) + (2*b^2*(-c)^(1/
4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sqrt[x]]^2)/(d*Sqrt[d*x]) + (2*b^2*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*Sqrt[x]]^2)/(
d*Sqrt[d*x]) - (4*b^2*(-c)^(1/4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sqrt[x]]*Log[2/(1 - (-c)^(1/4)*Sqrt[x])])/(d*Sqrt[
d*x]) - (4*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqrt[x]]*Log[2/(1 - I*(-c)^(1/4)*Sqrt[x])])/(d*Sqrt[d*x])
+ (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqrt[x]]*Log[(-2*(-c)^(1/4)*(1 - Sqrt[-Sqrt[c]]*Sqrt[x]))/((I*Sq
rt[-Sqrt[c]] - (-c)^(1/4))*(1 - I*(-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)
^(1/4)*Sqrt[x]]*Log[(2*(-c)^(1/4)*(1 + Sqrt[-Sqrt[c]]*Sqrt[x]))/((I*Sqrt[-Sqrt[c]] + (-c)^(1/4))*(1 - I*(-c)^(
1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqrt[x]]*Log[((1 + I)*(1 - (-c)^(
1/4)*Sqrt[x]))/(1 - I*(-c)^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + (4*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqrt[x
]]*Log[2/(1 + I*(-c)^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + (4*b^2*(-c)^(1/4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sqrt[x]]*Lo
g[2/(1 + (-c)^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sqrt[x]]*Log[(-2*(
-c)^(1/4)*(1 - Sqrt[-Sqrt[-c]]*Sqrt[x]))/((Sqrt[-Sqrt[-c]] - (-c)^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d
*x]) + (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sqrt[x]]*Log[(2*(-c)^(1/4)*(1 + Sqrt[-Sqrt[-c]]*Sqrt[x]))/
((Sqrt[-Sqrt[-c]] + (-c)^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTanh[
(-c)^(1/4)*Sqrt[x]]*Log[(-2*(-c)^(1/4)*(1 - Sqrt[-Sqrt[c]]*Sqrt[x]))/((Sqrt[-Sqrt[c]] - (-c)^(1/4))*(1 + (-c)^
(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sqrt[x]]*Log[(2*(-c)^(1/4)*(1 +
 Sqrt[-Sqrt[c]]*Sqrt[x]))/((Sqrt[-Sqrt[c]] + (-c)^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (2*b^2*(-
c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqrt[x]]*Log[((1 - I)*(1 + (-c)^(1/4)*Sqrt[x]))/(1 - I*(-c)^(1/4)*Sqrt[x])]
)/(d*Sqrt[d*x]) - (4*b^2*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*Sqrt[x]]*Log[2/(1 - c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x])
+ (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqrt[x]]*Log[(2*(-c)^(1/4)*(1 - c^(1/4)*Sqrt[x]))/(((-c)^(1/4) -
 I*c^(1/4))*(1 - I*(-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sqrt[x]
]*Log[(2*(-c)^(1/4)*(1 - c^(1/4)*Sqrt[x]))/(((-c)^(1/4) - c^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) -
 (4*b^2*c^(1/4)*Sqrt[x]*ArcTan[c^(1/4)*Sqrt[x]]*Log[2/(1 - I*c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + (2*b^2*c^(1/4)
*Sqrt[x]*ArcTan[c^(1/4)*Sqrt[x]]*Log[(-2*c^(1/4)*(1 - Sqrt[-Sqrt[-c]]*Sqrt[x]))/((I*Sqrt[-Sqrt[-c]] - c^(1/4))
*(1 - I*c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (2*b^2*c^(1/4)*Sqrt[x]*ArcTan[c^(1/4)*Sqrt[x]]*Log[(2*c^(1/4)*(1 +
 Sqrt[-Sqrt[-c]]*Sqrt[x]))/((I*Sqrt[-Sqrt[-c]] + c^(1/4))*(1 - I*c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (2*b^2*c^
(1/4)*Sqrt[x]*ArcTan[c^(1/4)*Sqrt[x]]*Log[(-2*c^(1/4)*(1 - (-c)^(1/4)*Sqrt[x]))/((I*(-c)^(1/4) - c^(1/4))*(1 -
 I*c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (2*b^2*c^(1/4)*Sqrt[x]*ArcTan[c^(1/4)*Sqrt[x]]*Log[(2*c^(1/4)*(1 + (-c)
^(1/4)*Sqrt[x]))/((I*(-c)^(1/4) + c^(1/4))*(1 - I*c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (2*b^2*c^(1/4)*Sqrt[x]*A
rcTan[c^(1/4)*Sqrt[x]]*Log[((1 + I)*(1 - c^(1/4)*Sqrt[x]))/(1 - I*c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + (4*b^2*c^
(1/4)*Sqrt[x]*ArcTan[c^(1/4)*Sqrt[x]]*Log[2/(1 + I*c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + (4*b^2*c^(1/4)*Sqrt[x]*A
rcTanh[c^(1/4)*Sqrt[x]]*Log[2/(1 + c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) - (2*b^2*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*S
qrt[x]]*Log[(-2*c^(1/4)*(1 - Sqrt[-Sqrt[-c]]*Sqrt[x]))/((Sqrt[-Sqrt[-c]] - c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(
d*Sqrt[d*x]) - (2*b^2*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*Sqrt[x]]*Log[(2*c^(1/4)*(1 + Sqrt[-Sqrt[-c]]*Sqrt[x]))/(
(Sqrt[-Sqrt[-c]] + c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (2*b^2*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*Sq
rt[x]]*Log[(-2*c^(1/4)*(1 - Sqrt[-Sqrt[c]]*Sqrt[x]))/((Sqrt[-Sqrt[c]] - c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(d*S
qrt[d*x]) + (2*b^2*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*Sqrt[x]]*Log[(2*c^(1/4)*(1 + Sqrt[-Sqrt[c]]*Sqrt[x]))/((Sqr
t[-Sqrt[c]] + c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (2*b^2*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*Sqrt[x]
]*Log[(-2*c^(1/4)*(1 - (-c)^(1/4)*Sqrt[x]))/(((-c)^(1/4) - c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (
2*b^2*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*Sqrt[x]]*Log[(2*c^(1/4)*(1 + (-c)^(1/4)*Sqrt[x]))/(((-c)^(1/4) + c^(1/4)
)*(1 + c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqrt[x]]*Log[(2*(-c)^(1
/4)*(1 + c^(1/4)*Sqrt[x]))/(((-c)^(1/4) + I*c^(1/4))*(1 - I*(-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (2*b^2*(-c)
^(1/4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sqrt[x]]*Log[(2*(-c)^(1/4)*(1 + c^(1/4)*Sqrt[x]))/(((-c)^(1/4) + c^(1/4))*(1
 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (2*b^2*c^(1/4)*Sqrt[x]*ArcTan[c^(1/4)*Sqrt[x]]*Log[((1 - I)*(1 + c^(
1/4)*Sqrt[x]))/(1 - I*c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + (Sqrt[2]*a*b*c^(1/4)*Sqrt[x]*Log[1 - Sqrt[2]*c^(1/4)*
Sqrt[x] + Sqrt[c]*x])/(d*Sqrt[d*x]) - (Sqrt[2]*a*b*c^(1/4)*Sqrt[x]*Log[1 + Sqrt[2]*c^(1/4)*Sqrt[x] + Sqrt[c]*x
])/(d*Sqrt[d*x]) - (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqrt[x]]*Log[1 - c*x^2])/(d*Sqrt[d*x]) + (2*b^2
*(-c)^(1/4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sqrt[x]]*Log[1 - c*x^2])/(d*Sqrt[d*x]) - (2*b*c^(1/4)*Sqrt[x]*ArcTan[c^
(1/4)*Sqrt[x]]*(2*a - b*Log[1 - c*x^2]))/(d*Sqrt[d*x]) + (2*b*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*Sqrt[x]]*(2*a -
b*Log[1 - c*x^2]))/(d*Sqrt[d*x]) - (2*a - b*Log[1 - c*x^2])^2/(2*d*Sqrt[d*x]) - (2*a*b*Log[1 + c*x^2])/(d*Sqrt
[d*x]) + (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTan[(-c)^(1/4)*Sqrt[x]]*Log[1 + c*x^2])/(d*Sqrt[d*x]) - (2*b^2*c^(1/4)*S
qrt[x]*ArcTan[c^(1/4)*Sqrt[x]]*Log[1 + c*x^2])/(d*Sqrt[d*x]) - (2*b^2*(-c)^(1/4)*Sqrt[x]*ArcTanh[(-c)^(1/4)*Sq
rt[x]]*Log[1 + c*x^2])/(d*Sqrt[d*x]) + (2*b^2*c^(1/4)*Sqrt[x]*ArcTanh[c^(1/4)*Sqrt[x]]*Log[1 + c*x^2])/(d*Sqrt
[d*x]) + (b^2*Log[1 - c*x^2]*Log[1 + c*x^2])/(d*Sqrt[d*x]) - (b^2*Log[1 + c*x^2]^2)/(2*d*Sqrt[d*x]) - (2*b^2*(
-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 - 2/(1 - (-c)^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + ((2*I)*b^2*(-c)^(1/4)*Sqrt[x]*Po
lyLog[2, 1 - 2/(1 - I*(-c)^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) - (I*b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 + (2*(-c)^(
1/4)*(1 - Sqrt[-Sqrt[c]]*Sqrt[x]))/((I*Sqrt[-Sqrt[c]] - (-c)^(1/4))*(1 - I*(-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]
) - (I*b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 - (2*(-c)^(1/4)*(1 + Sqrt[-Sqrt[c]]*Sqrt[x]))/((I*Sqrt[-Sqrt[c]] +
(-c)^(1/4))*(1 - I*(-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (I*b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 - ((1 + I)*(1
 - (-c)^(1/4)*Sqrt[x]))/(1 - I*(-c)^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + ((2*I)*b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2,
1 - 2/(1 + I*(-c)^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) - (2*b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 - 2/(1 + (-c)^(1/4)*
Sqrt[x])])/(d*Sqrt[d*x]) - (b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 + (2*(-c)^(1/4)*(1 - Sqrt[-Sqrt[-c]]*Sqrt[x]))
/((Sqrt[-Sqrt[-c]] - (-c)^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2
, 1 - (2*(-c)^(1/4)*(1 + Sqrt[-Sqrt[-c]]*Sqrt[x]))/((Sqrt[-Sqrt[-c]] + (-c)^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])
/(d*Sqrt[d*x]) + (b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 + (2*(-c)^(1/4)*(1 - Sqrt[-Sqrt[c]]*Sqrt[x]))/((Sqrt[-Sq
rt[c]] - (-c)^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 - (2*(-c
)^(1/4)*(1 + Sqrt[-Sqrt[c]]*Sqrt[x]))/((Sqrt[-Sqrt[c]] + (-c)^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x])
 + (I*b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 - ((1 - I)*(1 + (-c)^(1/4)*Sqrt[x]))/(1 - I*(-c)^(1/4)*Sqrt[x])])/(d
*Sqrt[d*x]) - (2*b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 - 2/(1 - c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) - (I*b^2*(-c)^(1/4
)*Sqrt[x]*PolyLog[2, 1 - (2*(-c)^(1/4)*(1 - c^(1/4)*Sqrt[x]))/(((-c)^(1/4) - I*c^(1/4))*(1 - I*(-c)^(1/4)*Sqrt
[x]))])/(d*Sqrt[d*x]) + (b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 - (2*(-c)^(1/4)*(1 - c^(1/4)*Sqrt[x]))/(((-c)^(1/
4) - c^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + ((2*I)*b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 - 2/(1 - I*c
^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) - (I*b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 + (2*c^(1/4)*(1 - Sqrt[-Sqrt[-c]]*Sqrt[x
]))/((I*Sqrt[-Sqrt[-c]] - c^(1/4))*(1 - I*c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (I*b^2*c^(1/4)*Sqrt[x]*PolyLog[2
, 1 - (2*c^(1/4)*(1 + Sqrt[-Sqrt[-c]]*Sqrt[x]))/((I*Sqrt[-Sqrt[-c]] + c^(1/4))*(1 - I*c^(1/4)*Sqrt[x]))])/(d*S
qrt[d*x]) - (I*b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 + (2*c^(1/4)*(1 - (-c)^(1/4)*Sqrt[x]))/((I*(-c)^(1/4) - c^(1/4
))*(1 - I*c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (I*b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 - (2*c^(1/4)*(1 + (-c)^(1/4)
*Sqrt[x]))/((I*(-c)^(1/4) + c^(1/4))*(1 - I*c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (I*b^2*c^(1/4)*Sqrt[x]*PolyLog
[2, 1 - ((1 + I)*(1 - c^(1/4)*Sqrt[x]))/(1 - I*c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) + ((2*I)*b^2*c^(1/4)*Sqrt[x]*P
olyLog[2, 1 - 2/(1 + I*c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x]) - (2*b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 - 2/(1 + c^(1/4)
*Sqrt[x])])/(d*Sqrt[d*x]) + (b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 + (2*c^(1/4)*(1 - Sqrt[-Sqrt[-c]]*Sqrt[x]))/((Sq
rt[-Sqrt[-c]] - c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 - (2*c^(1/
4)*(1 + Sqrt[-Sqrt[-c]]*Sqrt[x]))/((Sqrt[-Sqrt[-c]] + c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) - (b^2*c
^(1/4)*Sqrt[x]*PolyLog[2, 1 + (2*c^(1/4)*(1 - Sqrt[-Sqrt[c]]*Sqrt[x]))/((Sqrt[-Sqrt[c]] - c^(1/4))*(1 + c^(1/4
)*Sqrt[x]))])/(d*Sqrt[d*x]) - (b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 - (2*c^(1/4)*(1 + Sqrt[-Sqrt[c]]*Sqrt[x]))/((S
qrt[-Sqrt[c]] + c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (b^2*c^(1/4)*Sqrt[x]*PolyLog[2, 1 + (2*c^(1/
4)*(1 - (-c)^(1/4)*Sqrt[x]))/(((-c)^(1/4) - c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (b^2*c^(1/4)*Sqr
t[x]*PolyLog[2, 1 - (2*c^(1/4)*(1 + (-c)^(1/4)*Sqrt[x]))/(((-c)^(1/4) + c^(1/4))*(1 + c^(1/4)*Sqrt[x]))])/(d*S
qrt[d*x]) - (I*b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 - (2*(-c)^(1/4)*(1 + c^(1/4)*Sqrt[x]))/(((-c)^(1/4) + I*c^(
1/4))*(1 - I*(-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (b^2*(-c)^(1/4)*Sqrt[x]*PolyLog[2, 1 - (2*(-c)^(1/4)*(1 +
c^(1/4)*Sqrt[x]))/(((-c)^(1/4) + c^(1/4))*(1 + (-c)^(1/4)*Sqrt[x]))])/(d*Sqrt[d*x]) + (I*b^2*c^(1/4)*Sqrt[x]*P
olyLog[2, 1 - ((1 - I)*(1 + c^(1/4)*Sqrt[x]))/(1 - I*c^(1/4)*Sqrt[x])])/(d*Sqrt[d*x])

________________________________________________________________________________________

Rubi [F]  time = 0.0292299, antiderivative size = 0, normalized size of antiderivative = 0., number of steps used = 0, number of rules used = 0, integrand size = 0, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0., Rules used = {} \[ \int \frac{\left (a+b \tanh ^{-1}\left (c x^2\right )\right )^2}{(d x)^{3/2}} \, dx \]

Verification is Not applicable to the result.

[In]

Int[(a + b*ArcTanh[c*x^2])^2/(d*x)^(3/2),x]

[Out]

Defer[Int][(a + b*ArcTanh[c*x^2])^2/(d*x)^(3/2), x]

Rubi steps

\begin{align*} \int \frac{\left (a+b \tanh ^{-1}\left (c x^2\right )\right )^2}{(d x)^{3/2}} \, dx &=\int \frac{\left (a+b \tanh ^{-1}\left (c x^2\right )\right )^2}{(d x)^{3/2}} \, dx\\ \end{align*}

Mathematica [F]  time = 94.0147, size = 0, normalized size = 0. \[ \int \frac{\left (a+b \tanh ^{-1}\left (c x^2\right )\right )^2}{(d x)^{3/2}} \, dx \]

Verification is Not applicable to the result.

[In]

Integrate[(a + b*ArcTanh[c*x^2])^2/(d*x)^(3/2),x]

[Out]

Integrate[(a + b*ArcTanh[c*x^2])^2/(d*x)^(3/2), x]

________________________________________________________________________________________

Maple [F]  time = 0.272, size = 0, normalized size = 0. \begin{align*} \int{ \left ( a+b{\it Artanh} \left ( c{x}^{2} \right ) \right ) ^{2} \left ( dx \right ) ^{-{\frac{3}{2}}}}\, dx \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((a+b*arctanh(c*x^2))^2/(d*x)^(3/2),x)

[Out]

int((a+b*arctanh(c*x^2))^2/(d*x)^(3/2),x)

________________________________________________________________________________________

Maxima [F(-2)]  time = 0., size = 0, normalized size = 0. \begin{align*} \text{Exception raised: ValueError} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*arctanh(c*x^2))^2/(d*x)^(3/2),x, algorithm="maxima")

[Out]

Exception raised: ValueError

________________________________________________________________________________________

Fricas [F]  time = 0., size = 0, normalized size = 0. \begin{align*}{\rm integral}\left (\frac{{\left (b^{2} \operatorname{artanh}\left (c x^{2}\right )^{2} + 2 \, a b \operatorname{artanh}\left (c x^{2}\right ) + a^{2}\right )} \sqrt{d x}}{d^{2} x^{2}}, x\right ) \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*arctanh(c*x^2))^2/(d*x)^(3/2),x, algorithm="fricas")

[Out]

integral((b^2*arctanh(c*x^2)^2 + 2*a*b*arctanh(c*x^2) + a^2)*sqrt(d*x)/(d^2*x^2), x)

________________________________________________________________________________________

Sympy [F(-1)]  time = 0., size = 0, normalized size = 0. \begin{align*} \text{Timed out} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*atanh(c*x**2))**2/(d*x)**(3/2),x)

[Out]

Timed out

________________________________________________________________________________________

Giac [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{{\left (b \operatorname{artanh}\left (c x^{2}\right ) + a\right )}^{2}}{\left (d x\right )^{\frac{3}{2}}}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*arctanh(c*x^2))^2/(d*x)^(3/2),x, algorithm="giac")

[Out]

integrate((b*arctanh(c*x^2) + a)^2/(d*x)^(3/2), x)